Predicting Customer Lifetime Values In R